home *** CD-ROM | disk | FTP | other *** search
- -----------------------------------------------
- - eXtreme Movie Manager -
- - MagicScript Technology -
- - 2002 Alessio "AleTsg" Viti -
- -----------------------------------------------
- - Web : CINE.GR -
- - Author : DIM DAM -
- - Date : 05/05/2002 -
- - Comments : Import Almost All -
- -----------------------------------------------
-
- #MADEBY#=DIM DAM
- #DATEBUILD#=05/05/02
- #WEBSITE#=CINE.GR
- #NOTE#=Import Almost All (Plot needs work)
- #SCRIPTQUALITY#=3
-
- #WEBQUERY#=http://www.cine.gr/results.asp?term=#MOVIE#&type=film&image.x=16&image.y=16
- #RIGHTPAGEFOUND#
- #STARTREADWEB#
- #FINDLINE#=┴⌡Φσφ⌠ΘΩⁿ≥ ╘▀⌠δ∩≥#12##ONERROR#=*STOP*
- #PUT#=1#01#
- #CONDITIONRIGHTPAGE# #01#==#12#
- #ENDRIGHTPAGEFOUND#
-
- #CREATEMOVIELIST#
- #STARTREADWEB#
- #WRITETITLELIST#=╘┴╔═╔┼╙
- #WRITETITLELIST#=-----------------
- #FINDLINE#=<a href="film.asp#12##ONERROR#=*STOP*
- #REPEAT#
- #FIND#=film.asp?id=#01# #ONERROR#=*OK*
- #PUT#=0#02#
- #IF# #01#==#02#
- #GOTO#=ENDSEARCH1
- #ENDIF#
- #FIND#==#03# #ONERROR#=*ASK*
-
- #FIND#="#04# #ONERROR#=*ASK*
- #TAKEWORD#=#05#,#03#,#04#
-
- #FIND#=>#03# #ONERROR#=*ASK*
-
-
- #FIND#=<#04# #ONERROR#=*ASK*
- #TAKEWORD#=#06#,#03#,#04#
- #FIND#=produced=#03# #ONERROR#=*ASK*
- #FIND#=>#03# #ONERROR#=*ASK*
- #FIND#=<#04# #ONERROR#=*ASK*
- #TAKEWORD#=#07#,#03#,#04#
-
- #WRITETITLELIST#=http://www.cine.gr/film.asp?id=#05# ---> #07# (#06#)
- #WHILE# #01#<>#12#
- :ENDSEARCH1
-
- #ENDCREATEMOVIELIST#
-
- #MOVIETITLE#
- #STARTREADWEB#
- #FINDLINE#=┴⌡Φσφ⌠ΘΩⁿ≥ ╘▀⌠δ∩≥:</font><br><font face="Tahoma" size="5">#12##ONERROR#=*STOP*
- #FIND#=5"#03# #ONERROR#=*ASK*
- #FIND#=>#03# #ONERROR#=*ASK*
- #FIND#=<#04# #ONERROR#=*ASK*
- #TAKEWORD#=#06#,#03#,#04#
- #TITLE#=#06# #ONERROR#=*ASK*
- #STARTREADWEB#
- #FINDLINE#=╠σ⌠ß÷±ß≤∞▌φ∩≥ ╘▀⌠δ∩≥:</font><br><font face="Tahoma" size="2"><b>#12##ONERROR#=*STOP*
- #FIND#=2">#03# #ONERROR#=*ASK*
- #COMPUTECURSOR#=+3
- #FIND#=>#03# #ONERROR#=*ASK*
- #FIND#=<#04# #ONERROR#=*ASK*
- #TAKEWORD#=#07#,#03#,#04#
- #STRING#=#08#=#06# ( #07# )
- #TITLE#=#08# #ONERROR#=*ASK*
- #ENDMOVIETITLE#
-
-
- #DIRECTOR#
-
- #STARTREADWEB#
- :CAST2
- #FINDLINE#=people.asp?name#12##ONERROR#=*STOP*
- #FIND#=>#03# #ONERROR#=*ASK*
- #FIND#=<#04# #ONERROR#=*ASK*
- #TAKEWORD#=#06#,#03#,#04#
-
- #FINDLINE#=....#12##ONERROR#=*STOP*
- #COMPUTECURSOR#=+3
- #FIND#=.#03# #ONERROR#=*ASK*
- #FIND#=<#04# #ONERROR#=*ASK*
- #TAKEWORD#=#07#,#03#,#04#
- #PUT#=╟Φ∩≡∩Θⁿ≥#02#
- #PUT#=╟Φ∩≡∩Θⁿ≥#02#
- #IF# #07# == #02#
-
- #TAKEACTOR#=#06# #ONERROR#=*ASK*
- #ENDIF#
- #PUT#=╙Ωτφ∩Φσ⌠τ≥#02#
- #IF# #07# == #02#
-
- #TAKEDIRECTOR#=#06# #ONERROR#=*ASK*
- #ENDIF#
- #GOTO#=CAST2
-
-
- :GOLABEL
- #ENDDIRECTOR#
-
-
-
- #PLOT#
- #STARTREADWEB#
- #FINDLINE#=╒≡ⁿΦσ≤τ#12##ONERROR#=*STOP*
- #COMPUTECURSOR#=-20
- #FIND#==#01#
- #FIND#="#02#
- #TAKEWORD#=#03#,#01#,#02#
- #STRING#=#04#=http://www.cine.gr/film.asp?id=#03#
- #OPENNEWWEB#=#04#
- #STARTREADWEB#
- #FINDLINE#=╨δ∩Ω▐:</font></blockquote>#12##ONERROR#=*STOP*
- #READNEXTLINE#
-
- #READNEXTLINE#
- #FIND#=font#09##ONERROR#=*OK*
- #PUT#=0#10#
- #IF# #10#==#09#
- #PUT#=0#01#
- #PUT#=2000#02#
- #TAKEWORD#=#06#,#01#,#02#
- #ENDIF#
- #READNEXTLINE#
- #FIND#=font#09##ONERROR#=*OK*
- #PUT#=0#10#
- #IF# #10#==#09#
- #PUT#=0#01#
- #PUT#=2000#02#
- #TAKEWORD#=#07#,#01#,#02#
- #ENDIF#
-
- #READNEXTLINE#
- #FIND#=font#09##ONERROR#=*OK*
- #PUT#=0#10#
- #IF# #10#==#09#
- #PUT#=0#01#
- #PUT#=2000#02#
- #TAKEWORD#=#08#,#01#,#02#
- #ENDIF#
-
- #READNEXTLINE#
- #FIND#=font#09##ONERROR#=*OK*
- #PUT#=0#10#
- #IF# #10#==#09#
- #PUT#=0#01#
- #PUT#=2000#02#
- #TAKEWORD#=#11#,#01#,#02#
- #ENDIF#
-
- #READNEXTLINE#
- #FIND#=font#09##ONERROR#=*OK*
- #PUT#=0#10#
- #IF# #10#==#09#
- #PUT#=0#01#
- #PUT#=2000#02#
- #TAKEWORD#=#12#,#01#,#02#
- #ENDIF#
-
- #READNEXTLINE#
- #FIND#=font#09##ONERROR#=*OK*
- #PUT#=0#10#
- #IF# #10#==#09#
- #PUT#=0#01#
- #PUT#=2000#02#
- #TAKEWORD#=#13#,#01#,#02#
- #ENDIF#
-
- #STRING#=#50#=#06##07##08##11##12##13#
- #CHECKVARIABLE#=#50#
-
-
- #STARTDELETETAGS#
- #STARTSUBSTITUTETAGS#
- #TAKEPLOT#=#50# #ONERROR#=*ASK*
- #ENDPLOT#
-
- #RUNTIME#
- #STARTREADWEB#
- #FINDLINE#=─Θ▄±ΩσΘß:#12##ONERROR#=*STOP*
- #FIND#=<#01# #ONERROR#=*STOP*
- #FIND#=>#01# #ONERROR#=*STOP*
- #FIND#=<#02# #ONERROR#=*STOP*
- #TAKEWORD#=#03#,#01#,#02#
- #TAKERUNTIME#=#03# #ONERROR#=*ASK*
- #ENDRUNTIME#
-
- #YEAR#
- #STARTREADWEB#
- #FINDLINE#=produced=#12# #ONERROR#=*STOP*
- #FIND#=>#01# ONERROR#=*STOP*
-
- #FIND#=<#02# #ONERROR#=*STOP*
-
-
-
- #TAKEWORD#=#03#,#01#,#02#
- #TAKEYEAR#=#03# #ONERROR#=*ASK*
- #ENDYEAR#
-
- #POSTER#
- #STARTREADWEB#
- #FINDLINE#=img src="FilmImages#12##ONERROR#=*ok*
- #SETCURSOR#=1
- #FIND#=/#01# #ONERROR#=*STOP*
- #FIND#="#02# #ONERROR#=*STOP*
- #TAKEWORD#=#03#,#01#,#02#
- #STRING#=#04#=http://www.cine.gr/FilmImages/#03#
- #TAKEPOSTER#=#04#
-
- #ENDPOSTER#
-
- #DELETETAGS#
- #DELETEWORD#=
- #DELETEWORD#=<br>
- #DELETEWORD#=</BR>
- #DELETEWORD#=</P>
- #DELETEWORD#=</BLOCKQUOTE>
- #ENDDELETETAGS#
-
-
- #SUBSTITUTETAGS#
- #SUBSTITUTEWORD#= =
- #SUBSTITUTEWORD#=¡=í
- #SUBSTITUTEWORD#=¢=ó
- #SUBSTITUTEWORD#=£=ú
- #SUBSTITUTEWORD#=¤=ñ
- #SUBSTITUTEWORD#=¥=Ñ
- #SUBSTITUTEWORD#=¦=ª
- #SUBSTITUTEWORD#=§=º
- #SUBSTITUTEWORD#=¨=¿
- #SUBSTITUTEWORD#=©=⌐
- #SUBSTITUTEWORD#=ª=¬
- #SUBSTITUTEWORD#=«=½
- #SUBSTITUTEWORD#=¬=¼
- #SUBSTITUTEWORD#==¡
- #SUBSTITUTEWORD#=®=«
- #SUBSTITUTEWORD#=¯=»
- #SUBSTITUTEWORD#=°=░
- #SUBSTITUTEWORD#=±=▒
- #SUBSTITUTEWORD#=²=▓
- #SUBSTITUTEWORD#=³=│
- #SUBSTITUTEWORD#=´=┤
- #SUBSTITUTEWORD#=µ=╡
- #SUBSTITUTEWORD#=¶=╢
- #SUBSTITUTEWORD#=·=╖
- #SUBSTITUTEWORD#=¸=╕
- #SUBSTITUTEWORD#=¹=╣
- #SUBSTITUTEWORD#=º=║
- #SUBSTITUTEWORD#=»=╗
- #SUBSTITUTEWORD#=¼=╝
- #SUBSTITUTEWORD#=½=╜
- #SUBSTITUTEWORD#=¾=╛
- #SUBSTITUTEWORD#=¿=┐
- #SUBSTITUTEWORD#=À=└
- #SUBSTITUTEWORD#=Á=┴
- #SUBSTITUTEWORD#=Â=┬
- #SUBSTITUTEWORD#=Ã=├
- #SUBSTITUTEWORD#=Ä=─
- #SUBSTITUTEWORD#=Å=┼
- #SUBSTITUTEWORD#=Æ=╞
- #SUBSTITUTEWORD#=Ç=╟
- #SUBSTITUTEWORD#=È=╚
- #SUBSTITUTEWORD#=É=╔
- #SUBSTITUTEWORD#=Ê=╩
- #SUBSTITUTEWORD#=Ë=╦
- #SUBSTITUTEWORD#=Ì=╠
- #SUBSTITUTEWORD#=Í=═
- #SUBSTITUTEWORD#=Î=╬
- #SUBSTITUTEWORD#=Ï=╧
- #SUBSTITUTEWORD#=Ð=╨
- #SUBSTITUTEWORD#=Ñ=╤
- #SUBSTITUTEWORD#=Ò=╥
- #SUBSTITUTEWORD#=Ó=╙
- #SUBSTITUTEWORD#=Ô=╘
- #SUBSTITUTEWORD#=Õ=╒
- #SUBSTITUTEWORD#=Ö=╓
- #SUBSTITUTEWORD#=×=╫
- #SUBSTITUTEWORD#=Ø=╪
- #SUBSTITUTEWORD#=Ù=┘
- #SUBSTITUTEWORD#=Ú=┌
- #SUBSTITUTEWORD#=Û=█
- #SUBSTITUTEWORD#=Ü=▄
- #SUBSTITUTEWORD#=Ý=▌
- #SUBSTITUTEWORD#=Þ=▐
- #SUBSTITUTEWORD#=ß=▀
- #SUBSTITUTEWORD#=à=α
- #SUBSTITUTEWORD#=á=ß
- #SUBSTITUTEWORD#=â=Γ
- #SUBSTITUTEWORD#=ã=π
- #SUBSTITUTEWORD#=ä=Σ
- #SUBSTITUTEWORD#=å=σ
- #SUBSTITUTEWORD#=æ=µ
- #SUBSTITUTEWORD#=ç=τ
- #SUBSTITUTEWORD#=è=Φ
- #SUBSTITUTEWORD#=é=Θ
- #SUBSTITUTEWORD#=ê=Ω
- #SUBSTITUTEWORD#=ë=δ
- #SUBSTITUTEWORD#=ì=∞
- #SUBSTITUTEWORD#=í=φ
- #SUBSTITUTEWORD#=î=ε
- #SUBSTITUTEWORD#=ï=∩
- #SUBSTITUTEWORD#=ð=≡
- #SUBSTITUTEWORD#=ñ=±
- #SUBSTITUTEWORD#=ò=≥
- #SUBSTITUTEWORD#=ó=≤
- #SUBSTITUTEWORD#=ô=⌠
- #SUBSTITUTEWORD#=õ=⌡
- #SUBSTITUTEWORD#=ö=÷
- #SUBSTITUTEWORD#=÷=≈
- #SUBSTITUTEWORD#=ø=°
- #SUBSTITUTEWORD#=ù=∙
- #SUBSTITUTEWORD#=ú=·
- #SUBSTITUTEWORD#=û=√
- #SUBSTITUTEWORD#=ü=ⁿ
- #SUBSTITUTEWORD#=ý=²
- #SUBSTITUTEWORD#=þ=■
- #SUBSTITUTEWORD#=ÿ=
- #ENDSUBSTITUTETAGS#
-
-
-